﻿Imports System
Imports System.Collections.Generic
Imports System.Text
Imports System.Reflection

Namespace Install


    Public Class SPDActivityReciever
        Inherits WebConfigModifierReciever

        Protected Overrides ReadOnly Property OwnerModif() As String
            Get
                Return "MOSDActivities.Install"
            End Get
        End Property

        Protected Overrides Sub AddConfigurationToWebConfig(ByVal app As Microsoft.SharePoint.Administration.SPWebApplication)
            Dim assemblyName As String = Assembly.GetExecutingAssembly().GetName().FullName
            MyBase.AddNodeValue(String.Format("authorizedType[@assembly='{0}']", assemblyName), "configuration/System.Workflow.ComponentModel.WorkflowCompiler/authorizedTypes", String.Format("<authorizedType Assembly=""{0}"" Namespace=""RDdotNet.MOSDActivities"" TypeName=""*"" Authorized=""True"" />", assemblyName))
            MyBase.SaveWebConfig(app)
        End Sub

    End Class


End Namespace
